8bitfiles.net/archives

home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 03 Demos and Info / BASIC.DOC < prev next >
Unknown | 2019-04-13 | 2.3 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`1%`	dexvert	WANG Integrated Word Processor `(document/wangIWP)`	ext	Unsupported
`1%`	dexvert	Dynamic Publisher Document `(document/dynamicPublisherDocument)`	ext	Unsupported
`1%`	dexvert	Excellence! Document `(document/excellenceDocument)`	ext	Unsupported
`1%`	dexvert	Norton Textra Writer `(document/textraWriter)`	ext	Unsupported
`1%`	dexvert	IBM DisplayWrite Document `(document/ibmDisplayWriteDocument)`	ext	Unsupported
`100%`	file	data	default
`100%`	detectItEasy	Format: plain text[CR]	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 20 20 20 20 20 54 68 65 | 20 66 6f 6c 6c 6f 77 69 |     The| followi|
|00000010| 6e 67 20 70 72 6f 67 72 | 61 6d 73 20 61 6e 64 20 |ng progr|ams and |
|00000020| 74 69 70 73 20 61 72 65 | 20 65 78 61 6d 70 6c 65 |tips are| example|
|00000030| 73 20 6f 66 20 77 61 79 | 73 20 74 6f 20 6d 61 6b |s of way|s to mak|
|00000040| 65 20 79 6f 75 72 0d 20 | 20 20 20 20 42 41 53 49 |e your. |    BASI|
|00000050| 43 20 70 72 6f 67 72 61 | 6d 73 20 6c 6f 6f 6b 20 |C progra|ms look |
|00000060| 6d 6f 72 65 20 73 74 72 | 75 63 74 75 72 65 64 2e |more str|uctured.|
|00000070| 0d 20 20 20 20 20 0d 20 | 20 20 20 20 46 69 72 73 |.     . |    Firs|
|00000080| 74 20 6f 66 20 61 6c 6c | 20 69 74 20 69 73 20 61 |t of all| it is a|
|00000090| 6c 77 61 79 73 20 62 65 | 73 74 20 69 66 20 79 6f |lways be|st if yo|
|000000a0| 75 20 61 72 65 20 77 72 | 69 74 69 6e 67 20 61 20 |u are wr|iting a |
|000000b0| 6c 61 72 67 65 20 70 72 | 6f 67 72 61 6d 20 74 6f |large pr|ogram to|
|000000c0| 0d 20 20 20 20 20 62 72 | 65 61 6b 20 69 74 20 75 |.     br|eak it u|
|000000d0| 70 20 69 6e 74 6f 20 73 | 65 76 65 72 61 6c 20 73 |p into s|everal s|
|000000e0| 75 62 72 6f 75 74 69 6e | 65 73 2e 20 54 68 65 73 |ubroutin|es. Thes|
|000000f0| 65 20 73 75 62 72 6f 75 | 74 69 6e 65 73 20 63 6f |e subrou|tines co|
|00000100| 75 6c 64 20 6d 61 6b 65 | 20 75 73 65 0d 20 20 20 |uld make| use.   |
|00000110| 20 20 6f 66 20 76 61 72 | 69 61 62 6c 65 73 20 73 |  of var|iables s|
|00000120| 6f 20 61 73 20 74 6f 20 | 66 75 6e 63 74 69 6f 6e |o as to |function|
|00000130| 20 64 69 66 66 65 72 65 | 6e 74 6c 79 20 64 65 70 | differe|ntly dep|
|00000140| 65 6e 64 69 6e 67 20 6f | 6e 20 77 68 61 74 20 70 |ending o|n what p|
|00000150| 61 72 74 20 6f 66 0d 20 | 20 20 20 20 74 68 65 20 |art of. |    the |
|00000160| 70 72 6f 67 72 61 6d 20 | 69 73 20 63 61 6c 6c 69 |program |is calli|
|00000170| 6e 67 20 74 68 65 6d 2e | 0d 20 20 20 20 20 0d 20 |ng them.|.     . |
|00000180| 20 20 20 20 54 6f 20 67 | 69 76 65 20 79 6f 75 72 |    To g|ive your|
|00000190| 20 73 75 62 72 6f 75 74 | 69 6e 65 20 61 6e 20 61 | subrout|ine an a|
|000001a0| 70 70 65 61 72 65 6e 74 | 6c 79 20 52 45 4d 6c 65 |ppearent|ly REMle|
|000001b0| 73 73 20 74 69 74 6c 65 | 20 64 6f 20 74 68 65 0d |ss title| do the.|
|000001c0| 20 20 20 20 20 66 6f 6c | 6c 6f 77 69 6e 67 3a 0d |     fol|lowing:.|
|000001d0| 20 20 20 20 20 20 20 20 | 20 20 31 29 20 45 6e 74 |        |  1) Ent|
|000001e0| 65 72 20 74 68 65 20 52 | 45 4d 20 6f 6e 20 64 65 |er the R|EM on de|
|000001f0| 73 69 72 65 64 20 6c 69 | 6e 65 0d 20 20 20 20 20 |sired li|ne.     |
|00000200| 20 20 20 20 20 20 20 20 | 66 6f 6c 6c 6f 77 65 64 |        |followed|
|00000210| 20 62 79 20 61 20 71 75 | 6f 74 65 20 28 22 29 2e | by a qu|ote (").|
|00000220| 0d 20 20 20 20 20 20 20 | 20 20 20 32 29 20 50 72 |.       |   2) Pr|
|00000230| 65 73 73 20 3c 43 52 3e | 0d 20 20 20 20 20 20 20 |ess <CR>|.       |
|00000240| 20 20 20 33 29 20 43 75 | 72 73 6f 72 20 75 70 20 |   3) Cu|rsor up |
|00000250| 74 6f 20 74 68 61 74 20 | 6c 69 6e 65 20 61 6e 64 |to that |line and|
|00000260| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 74 6f |.       |      to|
|00000270| 20 74 68 65 20 72 69 67 | 68 74 20 6f 66 20 74 68 | the rig|ht of th|
|00000280| 61 74 20 71 75 6f 74 65 | 0d 20 20 20 20 20 20 20 |at quote|.       |
|00000290| 20 20 20 20 20 20 74 75 | 72 6e 20 6f 6e 20 72 65 |      tu|rn on re|
|000002a0| 76 65 72 73 65 20 6d 6f | 64 65 20 28 43 54 52 4c |verse mo|de (CTRL|
|000002b0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 52 56 |.       |      RV|
|000002c0| 53 2d 4f 4e 29 2e 0d 20 | 20 20 20 20 20 20 20 20 |S-ON).. |        |
|000002d0| 20 34 29 20 4e 6f 77 20 | 70 72 65 73 73 20 53 48 | 4) Now |press SH|
|000002e0| 49 46 54 20 4d 20 61 6e | 64 20 53 48 49 46 54 20 |IFT M an|d SHIFT |
|000002f0| 51 2e 0d 20 20 20 20 20 | 20 20 20 20 20 35 29 20 |Q..     |     5) |
|00000300| 50 72 65 73 73 20 74 68 | 65 20 71 75 6f 74 65 20 |Press th|e quote |
|00000310| 61 67 61 69 6e 20 74 68 | 65 6e 0d 20 20 20 20 20 |again th|en.     |
|00000320| 20 20 20 20 20 20 20 20 | 64 65 6c 65 74 65 20 69 |        |delete i|
|00000330| 74 2e 0d 20 20 20 20 20 | 20 20 20 20 20 36 29 20 |t..     |     6) |
|00000340| 45 6e 74 65 72 20 74 68 | 65 20 63 6f 6d 6d 65 6e |Enter th|e commen|
|00000350| 74 20 79 6f 75 20 77 69 | 73 68 20 74 6f 0d 20 20 |t you wi|sh to.  |
|00000360| 20 20 20 20 20 20 20 20 | 20 20 20 62 65 20 65 6e |        |   be en|
|00000370| 74 65 72 65 64 20 61 73 | 20 61 20 52 45 4d 61 72 |tered as| a REMar|
|00000380| 6b 2e 0d 20 20 20 20 20 | 20 20 20 20 20 37 29 20 |k..     |     7) |
|00000390| 50 72 65 73 73 20 71 75 | 6f 74 65 20 61 6e 64 20 |Press qu|ote and |
|000003a0| 74 68 65 6e 20 64 65 6c | 65 74 65 0d 20 20 20 20 |then del|ete.    |
|000003b0| 20 20 20 20 20 20 20 20 | 20 69 74 2e 0d 20 20 20 |        | it..   |
|000003c0| 20 20 20 20 20 20 20 38 | 29 20 52 56 53 2d 4f 4e |       8|) RVS-ON|
|000003d0| 2e 0d 20 20 20 20 20 20 | 20 20 20 20 39 29 20 4e |..      |    9) N|
|000003e0| 65 78 74 20 53 48 49 46 | 54 20 5a 2e 0d 20 20 20 |ext SHIF|T Z..   |
|000003f0| 20 20 20 20 20 20 31 30 | 29 20 46 69 6e 61 6c 6c |      10|) Finall|
|00000400| 79 2c 20 3c 43 52 3e 2e | 0d 20 20 20 20 20 54 68 |y, <CR>.|.     Th|
|00000410| 61 74 27 73 20 61 6c 6c | 20 74 68 65 72 65 20 69 |at's all| there i|
|00000420| 73 20 74 6f 20 69 74 21 | 20 49 20 63 61 6e 27 74 |s to it!| I can't|
|00000430| 20 74 61 6b 65 20 63 72 | 65 64 69 74 20 66 6f 72 | take cr|edit for|
|00000440| 20 74 68 69 73 20 6f 6e | 65 2e 20 49 74 0d 20 20 | this on|e. It.  |
|00000450| 20 20 20 62 65 6c 6f 6e | 67 73 20 74 6f 20 4c 75 |   belon|gs to Lu|
|00000460| 69 73 20 50 69 73 74 6f | 69 61 20 6f 66 20 41 72 |is Pisto|ia of Ar|
|00000470| 67 65 6e 74 69 6e 61 2e | 0d 20 20 20 20 20 09 00 |gentina.|.     ..|
|00000480| 20 20 20 20 54 6f 20 70 | 72 6f 64 75 63 65 20 74 |    To p|roduce t|
|00000490| 68 65 20 69 6e 64 65 6e | 74 61 74 69 6f 6e 20 65 |he inden|tation e|
|000004a0| 66 66 65 63 74 20 66 6f | 75 6e 64 20 69 6e 20 63 |ffect fo|und in c|
|000004b0| 65 72 74 61 69 6e 20 50 | 41 53 43 41 4c 20 61 6e |ertain P|ASCAL an|
|000004c0| 64 20 43 0d 20 20 20 20 | 20 65 64 69 74 6f 72 73 |d C.    | editors|
|000004d0| 2c 20 75 73 65 20 74 68 | 65 20 63 6f 6c 6f 6e 20 |, use th|e colon |
|000004e0| 28 3a 29 2e 20 54 68 61 | 74 27 73 20 61 6c 6c 21 |(:). Tha|t's all!|
|000004f0| 20 54 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 67 | The fol|lowing g|
|00000500| 69 76 65 20 65 78 61 6d | 70 6c 65 73 20 6f 66 0d |ive exam|ples of.|
|00000510| 20 20 20 20 20 77 68 61 | 74 20 49 20 6d 65 61 6e |     wha|t I mean|
|00000520| 3a 0d 20 20 20 20 20 0d | 20 20 20 20 20 2d 2d 2d |:.     .|     ---|
|00000530| 2d 2d 2d 2d 2d 2d 2d 0d | 20 20 20 20 20 50 52 4f |-------.|     PRO|
|00000540| 47 52 41 4d 20 23 31 0d | 20 20 20 20 20 2d 2d 2d |GRAM #1.|     ---|
|00000550| 2d 2d 2d 2d 2d 2d 2d 0d | 20 20 20 20 20 31 30 20 |-------.|     10 |
|00000560| 3a 46 4f 52 20 49 20 3d | 20 31 20 54 4f 20 31 30 |:FOR I =| 1 TO 10|
|00000570| 0d 20 20 20 20 20 31 32 | 20 3a 20 20 20 46 4f 52 |.     12| :   FOR|
|00000580| 20 4a 20 3d 20 31 20 54 | 4f 20 31 30 0d 20 20 20 | J = 1 T|O 10.   |
|00000590| 20 20 31 34 20 3a 20 20 | 20 20 20 20 46 4f 52 20 |  14 :  |    FOR |
|000005a0| 4b 20 3d 20 31 20 54 4f | 20 31 30 0d 20 20 20 20 |K = 1 TO| 10.    |
|000005b0| 20 31 36 20 3a 20 20 20 | 20 20 20 20 20 20 50 52 | 16 :   |      PR|
|000005c0| 49 4e 54 0d 20 20 20 20 | 20 31 38 20 3a 20 20 20 |INT.    | 18 :   |
|000005d0| 20 20 20 20 20 20 50 52 | 49 4e 54 0d 20 20 20 20 |      PR|INT.    |
|000005e0| 20 32 30 20 3a 20 20 20 | 20 20 20 20 20 20 50 52 | 20 :   |      PR|
|000005f0| 49 4e 54 0d 20 20 20 20 | 20 32 32 20 3a 20 20 20 |INT.    | 22 :   |
|00000600| 20 20 20 20 20 20 50 52 | 49 4e 54 20 4b 2c 0d 20 |      PR|INT K,. |
|00000610| 20 20 20 20 32 34 20 3a | 20 20 20 20 20 20 20 20 |    24 :|        |
|00000620| 20 50 52 49 4e 54 20 4a | 2c 0d 20 20 20 20 20 32 | PRINT J|,.     2|
|00000630| 36 20 3a 20 20 20 20 20 | 20 20 20 20 50 52 49 4e |6 :     |    PRIN|
|00000640| 54 20 49 0d 20 20 20 20 | 20 32 38 20 3a 20 20 20 |T I.    | 28 :   |
|00000650| 20 20 20 20 20 20 50 52 | 49 4e 54 0d 20 20 20 20 |      PR|INT.    |
|00000660| 20 33 30 20 3a 20 20 20 | 20 20 20 20 20 20 50 52 | 30 :   |      PR|
|00000670| 49 4e 54 0d 20 20 20 20 | 20 33 32 20 3a 20 09 00 |INT.    | 32 : ..|
|00000680| 20 20 20 20 20 20 50 52 | 49 4e 54 0d 20 20 20 20 |      PR|INT.    |
|00000690| 20 33 34 20 3a 20 20 20 | 20 20 20 4e 45 58 54 20 | 34 :   |   NEXT |
|000006a0| 4b 0d 20 20 20 20 20 33 | 36 20 3a 20 20 20 4e 45 |K.     3|6 :   NE|
|000006b0| 58 54 20 4a 0d 20 20 20 | 20 20 33 38 20 3a 4e 45 |XT J.   |  38 :NE|
|000006c0| 58 54 20 49 0d 20 20 20 | 20 20 0d 0d 20 20 20 20 |XT I.   |  ..    |
|000006d0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 20 20 20 20 | -------|---.    |
|000006e0| 20 50 52 4f 47 52 41 4d | 20 23 32 0d 20 20 20 20 | PROGRAM| #2.    |
|000006f0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 20 20 20 20 | -------|---.    |
|00000700| 20 31 30 20 3a 52 45 4d | 20 20 20 54 48 49 53 20 | 10 :REM|   THIS |
|00000710| 49 53 20 41 4e 20 45 58 | 41 4d 50 4c 45 20 49 4e |IS AN EX|AMPLE IN|
|00000720| 0d 20 20 20 20 20 31 32 | 20 3a 52 45 4d 20 20 20 |.     12| :REM   |
|00000730| 53 54 52 55 43 54 55 52 | 45 44 20 50 52 4f 47 52 |STRUCTUR|ED PROGR|
|00000740| 41 4d 20 44 45 53 49 47 | 4e 0d 20 20 20 20 20 31 |AM DESIG|N.     1|
|00000750| 34 20 3a 52 45 4d 0d 20 | 20 20 20 20 31 36 20 3a |4 :REM. |    16 :|
|00000760| 42 45 47 49 4e 4e 49 4e | 47 3d 31 3a 20 46 49 4e |BEGINNIN|G=1: FIN|
|00000770| 49 53 48 3d 31 32 0d 20 | 20 20 20 20 31 38 20 3a |ISH=12. |    18 :|
|00000780| 46 4f 52 20 4c 4f 4f 50 | 20 3d 20 42 45 47 49 4e |FOR LOOP| = BEGIN|
|00000790| 4e 49 4e 47 20 54 4f 20 | 46 49 4e 49 53 48 0d 20 |NING TO |FINISH. |
|000007a0| 20 20 20 20 32 30 20 3a | 20 20 20 50 52 49 4e 54 |    20 :|   PRINT|
|000007b0| 20 22 4c 4f 4f 50 20 23 | 22 3b 20 4c 4f 4f 50 0d | "LOOP #|"; LOOP.|
|000007c0| 20 20 20 20 20 32 32 20 | 3a 20 20 20 50 52 49 4e |     22 |:   PRIN|
|000007d0| 54 3a 20 50 52 49 4e 54 | 3a 20 50 52 49 4e 54 0d |T: PRINT|: PRINT.|
|000007e0| 20 20 20 20 20 32 34 20 | 3a 4e 45 58 54 20 4c 4f |     24 |:NEXT LO|
|000007f0| 4f 50 0d 20 20 20 20 20 | 39 39 20 3a 53 54 4f 50 |OP.     |99 :STOP|
|00000800| 0d 20 20 20 20 20 0d 20 | 20 20 20 20 41 6c 73 6f |.     . |    Also|
|00000810| 2c 20 69 6e 20 50 52 4f | 47 52 41 4d 20 23 32 20 |, in PRO|GRAM #2 |
|00000820| 49 20 75 73 65 20 6c 6f | 6e 67 20 76 61 72 69 61 |I use lo|ng varia|
|00000830| 62 6c 65 20 6e 61 6d 65 | 73 20 74 6f 20 6d 61 6b |ble name|s to mak|
|00000840| 65 20 74 68 65 20 70 72 | 6f 67 72 61 6d 20 6d 6f |e the pr|ogram mo|
|00000850| 72 65 0d 20 20 20 20 20 | 72 65 61 64 61 62 6c 65 |re.     |readable|
|00000860| 2e 20 4e 61 74 75 72 61 | 6c 6c 79 20 42 41 53 49 |. Natura|lly BASI|
|00000870| 43 20 77 69 6c 6c 20 6f | 6e 6c 79 20 72 65 09 00 |C will o|nly re..|
|00000880| 20 74 68 65 20 66 69 72 | 73 74 20 74 77 6f 20 63 | the fir|st two c|
|00000890| 68 61 72 61 63 74 65 72 | 73 20 6f 66 0d 20 20 20 |haracter|s of.   |
|000008a0| 20 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 2e 20 |  the va|riable. |
|000008b0| 46 6f 72 20 65 78 61 6d | 70 6c 65 20 74 68 65 20 |For exam|ple the |
|000008c0| 42 41 53 49 43 20 69 6e | 74 65 72 70 72 65 74 65 |BASIC in|terprete|
|000008d0| 72 20 77 69 6c 6c 20 72 | 65 66 65 72 20 74 6f 20 |r will r|efer to |
|000008e0| 74 68 65 0d 20 20 20 20 | 20 76 61 72 69 61 62 6c |the.    | variabl|
|000008f0| 65 20 42 45 47 49 4e 4e | 49 4e 47 20 61 73 20 42 |e BEGINN|ING as B|
|00000900| 45 2e 0d 20 20 20 20 20 | 0d 20 20 20 20 20 49 20 |E..     |.     I |
|00000910| 68 6f 70 65 20 74 68 65 | 73 65 20 68 69 6e 74 73 |hope the|se hints|
|00000920| 20 61 72 65 20 68 65 6c | 70 66 75 6c 2e 20 49 66 | are hel|pful. If|
|00000930| 20 74 68 65 79 20 61 72 | 65 2c 20 70 61 73 73 20 | they ar|e, pass |
|00000940| 74 68 65 6d 20 6f 6e 21 | 0d 0d 0d                |them on!|...     |
+--------+-------------------------+-------------------------+--------+--------+